www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8(全功能,无限制,完全开源)/Gu_showtie.asp
<!--#include file="ku_top.asp"--> <% id=request.querystring("guxing") If isInt(ID)=False OR Not IsNumeric(ID) Then Response.Redirect "Gu_Quan.asp" Response.End() End If set rs=server.createobject("adodb.recordset") sql="update quan_ht set llcs=llcs+1 where ID="&ID&"" rs.open sql,conn,1,3 set rsmsg=server.createobject("adodb.recordset") sqlmsg="select * from quan_ht where id="&id&"" rsmsg.open sqlmsg,conn,1,1 if rsmsg.bof and rsmsg.eof then response.Redirect("Quan.asp") end if class_id=rsmsg("qid") mainuser=rsmsg("fbr") set rsk=server.createobject("adodb.recordset") sqlk="select * from quan where id="&class_id rsk.open sqlk,conn,1,1 function title() ID=Request.QueryString("guxing") set rs=server.createobject("adodb.recordset") rs.Open "Select * From quan_ht where id="&id, conn,3,3 %> <%=rs("title")%> <%end function%> <div align="center"> <table cellpadding="0" cellspacing="0" width="100"> <tr> <td height="5"></td> </tr> </table> </div> <div align="center"> <table border="0" width="980" height="454" cellpadding="0" cellspacing="0"> <tr> <td height="454" width="740" valign="top"> <div align="center"> <table cellpadding="0" cellspacing="0" width="740" height="452"> <tr> <td height="36"> <table border="0" width="740" id="table2" cellpadding="0" cellspacing="0"> <tr> <td width="18" height="28" bgcolor="#99ff00"><img border="0" src="pkxx-Img/icon15.gif"> </td> <td width="354" bgcolor="#99ff00" height="28"> <b><font color="#0000FF"> 圈子主题:</font><font color="#ff0000"><%=title%></font></b></td> <td width="115" bgcolor="#99ff00" height="28"> <b><a href="Tie_re.asp?qid=<%=rsk("id")%>&tieid=<%=request.querystring("guxing")%>"> <img border="0" src="pkxx-Img/hfht.jpg"></a></b></td> <td width="110" bgcolor="#99ff00" height="28"><b><font color="#FF0000"> <a href="User_put_tie.asp?id=<%=rsk("id")%>"> <img border="0" src="pkxx-Img/fxht.jpg"></a></font></b></td> </tr> </table></td> </tr> <tr> <td height="396" background="Ku_img/News/news_002.JPG" valign="top"> <!----> <div align="center"> <table border="0" width="735" height="326" cellpadding="0" cellspacing="0"> <tr> <td height="33" width="735" background="Ku_Img/Art/art_001.jpg"> <table border="0" width="735" id="table1" cellpadding="0" cellspacing="0"> <tr> <td width="150" height="28" bgcolor="#ddbbaa"> <p align="left"><b> 【<a href="My_quan.asp?id=<%=rsk("id")%>"><%=rsk("name")%></a>】</b></td> <td width="253" bgcolor="#ddbbaa">>> 圈子话题</td> <td width="126" bgcolor="#ddbbaa"></td> <td width="122" bgcolor="#ddbbaa"></td> </tr> </table> </td> </tr> <tr> <td height="279" width="735" background="Ku_Img/Art/art_002.JPG" valign="top"> <!--#include file="ku_type/Tie_index.asp"--> <!--#include file="ku_type/Tie_re.asp"--> </td> </tr> </table> </div> <!----> </td> </tr> <tr> <td height="4"> <img border="0" src="Ku_img/News/news_003.JPG" width="740" height="4"></td> </tr> </table> </div> </td> <td height="454" width="8"> </td> <td height="454" width="232" valign="top"> <!--#include file="Ku_type/Index_login.asp"--> <!--#include file="Ku_type/tie_hot.asp"--> <img border="0" src="pkxx-img/ad001.JPG" width="232"> <img border="0" src="pkxx-img/ad002.JPG" width="232"> <img border="0" src="pkxx-img/ad003.JPG" width="232"> </td> </tr> </table> </div> <!--#include file="Ku_foot.asp"-->